home *** CD-ROM | disk | FTP | other *** search
/ Garbo / Garbo.cdr / mac / hypercrd / hc1_2_x / stabilzr.sit / The Stabilizer / card_9877.txt < prev    next >
Text File  |  1989-02-05  |  576b  |  24 lines
  1. -- card: 9877 from stack: in
  2. -- bmap block id: 3954
  3. -- flags: 4000
  4. -- background id: 2175
  5. -- name: firstCard
  6. ----- HyperTalk script -----
  7. on openCard
  8.   put the seconds + 5 into waitSec
  9.   get card field "allExpenses" of card "whichMonths"
  10.   if it = empty then
  11.     repeat until the seconds >= waitSec or the mouseClick
  12.     end repeat
  13.     visual venetian blinds to gray
  14.     visual venetian blinds
  15.     go card "about"
  16.   else
  17.     get word 1 of item 2 of the long date
  18.     visual barn door close slowly to gray
  19.     visual barn door open slowly
  20.     go card it
  21.   end if
  22. end openCard
  23.  
  24.